home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / Bonus / VCLZip / kp222_b5.exe / kpSFXOpt.hpp < prev    next >
Encoding:
C/C++ Source or Header  |  2001-07-23  |  1.8 KB  |  60 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1999 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'kpSFXOpt.pas' rev: 5.00
  6.  
  7. #ifndef kpSFXOptHPP
  8. #define kpSFXOptHPP
  9.  
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #pragma option push -Vx
  13. #include <SysInit.hpp>    // Pascal unit
  14. #include <System.hpp>    // Pascal unit
  15.  
  16. //-- user supplied -----------------------------------------------------------
  17.  
  18. namespace Kpsfxopt
  19. {
  20. //-- type declarations -------------------------------------------------------
  21. #pragma option push -b-
  22. enum TsfxOverwriteMode { omPrompt, omAlways, omNever };
  23. #pragma option pop
  24.  
  25. #pragma pack(push, 1)
  26. struct sfxSpecialHeader
  27. {
  28.     char Sig[3];
  29.     Byte OptionsByte;
  30.     Byte CaptionLen;
  31.     Byte ExtractPathLen;
  32.     Byte CmdLineLen;
  33.     char StringData[249];
  34. } ;
  35. #pragma pack(pop)
  36.  
  37. //-- var, const, procedure ---------------------------------------------------
  38. #define SFXSig "MPU"
  39. extern PACKAGE sfxSpecialHeader MPUHeader;
  40. extern PACKAGE char *OptionsPointer;
  41. extern PACKAGE int OptionsSize;
  42. extern PACKAGE void __fastcall setUserCanDisableCmdLine(bool Value);
  43. extern PACKAGE void __fastcall setUserCanChooseFiles(bool Value);
  44. extern PACKAGE void __fastcall setUserCanChangeOverwrite(bool Value);
  45. extern PACKAGE void __fastcall setAutoExtract(bool Value);
  46. extern PACKAGE void __fastcall setOverwriteMode(TsfxOverwriteMode om);
  47. extern PACKAGE void __fastcall setStringData(AnsiString sfxCaption, AnsiString sfxDefPath, AnsiString 
  48.     sfxCmdLine);
  49.  
  50. }    /* namespace Kpsfxopt */
  51. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  52. using namespace Kpsfxopt;
  53. #endif
  54. #pragma option pop    // -w-
  55. #pragma option pop    // -Vx
  56.  
  57. #pragma delphiheader end.
  58. //-- end unit ----------------------------------------------------------------
  59. #endif    // kpSFXOpt
  60.